Описание
Возвращает все разрешения, присвоенные учетной записи, указанной в свойстве UserName текущего объекта Container или Document, включая как разрешения, присвоенные конкретному пользователю, так и разрешения, которые пользователь наследует как член групп (только в рабочей области Microsoft Jet).

Значение
Для любого объекта Container или Document возвращаемое значение имеет тип Long или задается с помощью следующих констант.

dbSecReadDef			Допускается чтение описания таблицы, в том числе сведений о 
				столбцах и индексах.
dbSecWriteDef			Допускается изменение и удаление описания таблицы, в том числе 
				сведений о столбцах и индексах.
dbSecRetrieveData			Допускается загрузка данных из объекта Document.
dbSecInsertData			Допускается добавление записей.
dbSecReplaceData			Допускается изменение записей.
dbSecDeleteData			Допускается удаление записей.

Кроме того, для контейнера из семейства баз данных, а также для любого объекта Document из семейства Documents, возможно включение следующих констант.

dbSecDeleteData			Допускается удаление записей.
dbSecDBAdmin			Допускается репликация и изменение пароля базы данных.
dbSecDBCreate			Допускается создание новой базы данных.  Поддерживается только для контейнера 
				семейства база данных в системной базе данных (System.mdw).
dbSecDBExclusive			Монопольный доступ к базе данных.
dbSecDBOpen			Допускается открытие базы данных.

Замечания
Данное свойство отличается от свойства Permissions, в котором возвращаются только разрешения, присвоенных конкретному пользователю, и не включаются разрешения, которые пользователь наследует как член группы. Если текущим значением свойства UserName является имя группы, то значения, возвращаемые свойствами AllPermissions и Permissions, совпадают.

Пример
Следующая программа использует свойства SystemDB, AllPermissions и Permissions для демонстрации получения пользователями различных разрешений в зависимости от группы, к которой они принадлежат.

Sub AllPermissionsX()

	' Проверяет, что файл системной базы данных Microsoft Jet
	' является доступным.
	DBEngine.SystemDB = "system.mdw"

	Dim dbsNorthwind As Database
	Dim ctrLoop As Container

	Set dbsNorthwind = OpenDatabase("Борей.mdb")

	' Отображает семейство Containers и печатает имя текущего 
	' пользователя и присвоенные ему разрешения.
	For Each ctrLoop In dbsNorthwind.Containers

	With ctrLoop
			Debug.Print "Контейнер: " & .Name
			Debug.Print "Пользователь: " & .UserName
			Debug.Print "    Permissions: " & .Permissions
			Debug.Print "    AllPermissions: " & .AllPermissions
		End With
	Next ctrLoop
	dbsNorthwind.Close
End Sub